--Nachfolger mit kleinstem Attribut
--Das BE wird zu dem Nachfolger umgelagert, der den kleinsten Wert des angegebenen Attributs hat.
/* Das BE wird abhngig von einem Attribut eines Nachfolgers umgelagert.
Ersetzen sie 'attribute' z.B. durch 'Bearbeitungszeit', wird zu dem Nachfogler
umgelagert, der die krzeste Bearbeitungszeit hat.

Implementierungsdetails: ?.AnzahlNF wird der Variablen anzahlNF zugewiesen
und nicht in den Schleifenkopf aufgenommen, um zu vermeiden da bei jedem
Schleifendurchlauf eine zeitaufwendige Auswertung des Pfades ?.AnzahlNF erfolgt.
*/
is
	anzahlNF: integer;
	i: integer;
	minVal: any;
	minNF: integer;
do
	anzahlNF := ?.AnzahlNF;

	if anzahlNF > 0 then
		minVal := ?.nf(1).Attribute;
		minNF := 1;
	else
		return;
	end;

	for i:=2 to anzahlNF loop
		if ?.nf(i).Attribute < minVal then
			minVal := ?.nf(i).Attribute;
			minNF := i;
		end;
	next;

	@.umlagern(minNF);
end;
/*Attribut:Attribut des Nachfolgers welches die Umlagerung bestimmen soll.
*/